www.gusucode.com > 落叶冰点万能企业网站内容管理系统 V9.1 > 落叶冰点万能企业网站内容管理系统 V9.1\code\xcomasp\D_chk_edit_a_template_www_aspcpu_com_newdsoft_ruandingyuan_x.asp

    <%


'**************************************************************
' 新动软网站管理系统
' 官方网站: http://www.aspcpu.com
' 系统作者: 阮丁远(网名：天下程序)
' Copyright 新动软网站管理系统 版权所有
'**************************************************************


%>





<LINK href="css_www_aspcpu_com_newdsoft_ruandingyuan_x.css" type=text/css rel=stylesheet>
<%

dir_set="../../"


%>


<!--#include file=../../inc/conn.asp-->
<!--#include file=../../inc/Functionb.asp-->

<!--#include file=../../inc/ajaxLIB.asp-->

<!--#include file=checkadmin3_www_aspcpu_com_newdsoft_ruandingyuan_x.asp-->

<!--#include file=../../inc/functionFiless.asp-->

<!--#include file=../../inc/ND_class_function.asp-->





<%
AJAXshowLoader()

%>

<%


if find_dataw("qitashezhi123","0",6)<>"1" and qx_if_max=0 then
response.redirect "/admin/D_suodinguser.asp"
end if

%>

<%

ss4=request("ss4")






set filea=new Cls_FSO



ddddqq=huanyuan_textare_for_editor(request("Content"))

if savefile(ddddqq,"../../templates/"&ss4)=true then



session("newdsoft_selct_a_lable_bef_haved")=""





set rs1=server.CreateObject("adodb.recordset")
       
rs1.open "select * from ND_templates_folder_reg_qiye where id="&request("pid"),conn,1,1

if rs1("is_default_template")=true then



complie_dir="../../"&nd_web_admin_folder&"/"&"adminKernel/"

cpml_is_cms=0
cont222=replace_label_main(ddddqq,"templates/"&ss4)

call savefile(cont222,"../../"&nd_web_output_folder_qiye&"/"&trim(request("fname")))



end if














%>



<script language=javascript>

alert("修改成功!");










<%
'sttstrr="webname_settings"
sttstrr="webname_settings_qiye"

	
biao3="[ND_sys]"
	
set rs22d=server.CreateObject("adodb.recordset")
rs22d.open "select top 1 * from "&biao3&" where type='"&sttstrr&"'",conn,1,1
	
	ddd1d=rs22d("data")
	

dddd12d=split(ddd1d,"|")

hhhta=cstr(dddd12d(4))
hhhtax=cstr(dddd12d(5))
htm_ext_ming=mid(hhhtax,2,len(hhhtax))	
	
	
if clng(hhhta)=1 then
%>


alert("你开启了全站生成htm功能，所以还要去刷新各htm页，请进入各生成htm功能菜单里生成各htm页");


<%	
	
	
end if	
	
	
	%>








self.location="../../<%=nd_web_admin_folder%>/adminTemplates_qiye/D_edit_admin_zi_templates.asp?pid=<%=request("pid")%>";


</script>



<%

end if
AJAXcloseLoader()
%>